
		sub VbAlert(msg)
			msgbox msg,64,"Message"
		end sub
